clear all;
X=[15.0,15.8,15.2,15.1,15.9,14.7,14.8,15.5,15.6,15.3,...
   15.1,15.3,15.0,15.6,15.7,14.8,14.5,14.2,14.9,14.9,...
   15.2,15.0,15.3,15.6,15.1,14.9,14.2,14.6,15.8,15.2,...
   15.9,15.2,15.0,14.9,14.8,14.5,15.1,15.5,15.5,15.1,...
   15.1,15.0,15.3,14.7,14.5,15.5,15.0,14.7,14.6,14.2];
[h,P,Jbstat,CV]=jbtest(X,0.05)
mu=mean(X)
